home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-04
/
422mods.zip
/
TANIS003.422
< prev
next >
Wrap
Text File
|
1993-03-07
|
7KB
|
167 lines
Tanis003.mod, supreme chainlister mod with gold! Blinking!!!
Pull #783 @17310
Wednesday, March 3, 1993 11:22 pm
┌────────────────────────────────────────────────────────────────────────────┐
│ Mod Name: : TANIS003.MOD Author : Tanis Half-Elven 1@17315 │
│ Difficulty : Easy Date : 2/26/93 │
│ Files Modded : BBSUTL1.C WWIV Version : 4.22 (Any Really) │
│ Description : A two colum chain lister. Also a Fix to the one chain prob.│
└────────────────────────────────────────────────────────────────────────────┘
Well i got the idea for this mod one day while playing some online game. I
dont know quite where it came from, it just poped in there. Anyway, the mod
will display the chains in two colums. The first void has the call for gold.
But if you dont have gold/dont want gold, then the second void is for you. Oh
in the first void the gold will flash red if it is zero, kinda a freebee
alert for the leechs.
The second part of this mod is just to delete some stuff to keep WWIV from
automaticly running a chain, if ther is only 1. I hate pressing '.' and it
running a chain with out consulting me! This came from a mod Galen made.
-*-*-*A Special thanx to Galen Pathwarden. Most of this add on code is *-*-*-
-*-*-*his making, and he also is a big help! *-*-*-
Step 1: Back up your source, because i am not responsible for anything that
happens to you or your computer.
Step 2: Load BBSUTL1.C
Step 3: Search fo : void show_chains(int *mapp, int *map)
Step 4: Delete all of void show_chains(int *mapp, int *map)
Step 5: Put in part a if you have gold, otherwise put in part b.
/* Part A */
void show_chains(int *mapp, int *map)
{
int abort,i,i1;
char s[181],s1[181],ch1d[10],ch2d[10];
if (okansi()) {
abort=0;
nl();
pla("7╔═════════════════════════════════════════════════════════════════════════════╗",&abort);
pla("7║ 1Your BBS Name here!!! 7║",&abort);
pla("7╠═══╦══════╦═══════════════════════════╦═══╦══════╦═══════════════════════════╣",&abort);
pla("7║ 3# 7║ 2Gold 7║ 1Programs 7║ 3# 7║ 2Gold 7║ 1Programs 7║",&abort);
pla("7╠═══╬══════╬═══════════════════════════╬═══╬══════╬═══════════════════════════╣",&abort);
for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
if (costgold[map[i]]==0)
sprintf(ch1d,"6%-3d",costgold[map[i]]);
else sprintf(ch1d,"2%-3d",costgold[map[i]]);
sprintf(s, "7║3%2d 7║ %s 7║ 1%-25.25s ",
i+1,ch1d,(chains[map[i]].description));
i++;
if (costgold[map[i]]==0)
sprintf(ch2d,"6%-3d",costgold[map[i]]);
else sprintf(ch2d,"2%-3d",costgold[map[i]]);
sprintf(s1,"7║3%2d 7║ %s 7║ 1%-25.25s 7║",
i+1,ch2d,chains[map[i]].description);
strcat(s,s1);
pla(s,&abort);
}
pla("7╚═══╩══════╩═══════════════════════════╩═══╩══════╩═══════════════════════════╝",&abort);
} else {
abort=0;
nl();
pla("+-----------------------------------------------------------------------------+",&abort);
pla("| Your BBS Name here!!! |",&abort);
pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
pla("| # | Gold | Programs | # | Gold | Programs |",&abort);
pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
if (costgold[map[i]]==0)
sprintf(ch1d,"6%-3d",costgold[map[i]]);
else sprintf(ch1d,"%-3d",costgold[map[i]]);
sprintf(s, "|%2d | %s 0| %-25.25s ",
i+1,ch1d,(chains[map[i]].description));
i++;
if (costgold[map[i]]==0)
sprintf(ch2d,"6%-3d",costgold[map[i]]);
else sprintf(ch2d,"%-3d",costgold[map[i]]);
sprintf(s1,"|%2d | %s 0| %-25.25s |",
i+1,ch2d,chains[map[i]].description);
strcat(s,s1);
pla(s,&abort);
}
pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
}
nl();
}
/* Part B */
void show_chains(int *mapp, int *map)
{
int abort,i,i1;
char s[181],s1[181],ch1d[10],ch2d[10];
if (okansi()) {
abort=0;
nl();
pla("7╔═════════════════════════════════════════════════════════════════════════════╗",&abort);
pla("7║ 1Your BBS Name here!!! 7║",&abort);
pla("7╠═══╦══════════════════════════════════╦═══╦══════════════════════════════════╣",&abort);
pla("7║ 3# 7║ 1Programs 7║ 3# 7║ 1Programs 7║",&abort);
pla("7╠═══╬══════════════════════════════════╬═══╬══════════════════════════════════╣",&abort);
for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
sprintf(s, "7║3%2d 7║ 1%-32.32s ",
i+1,(chains[map[i]].description));
i++;
sprintf(s1,"7║3%2d 7║ 1%-32.32s 7║",
i+1,ch2d,chains[map[i]].description);
strcat(s,s1);
pla(s,&abort);
}
pla("7╚═══╩══════════════════════════════════╩═══╩══════════════════════════════════╝",&abort);
} else {
abort=0;
nl();
pla("+-----------------------------------------------------------------------------+",&abort);
pla("| Your BBS Name here!!! |",&abort);
pla("+---+----------------------------------+---+----------------------------------+",&abort);
pla("| # | Programs | # | Programs |",&abort);
pla("+---+----------------------------------+---+----------------------------------+",&abort);
for (i=0; (i<*mapp) && (!abort) && (!hangup); i++) {
sprintf(s, "|%2d | %-32.32s ",
i+1,(chains[map[i]].description));
i++;
if (costgold[map[i]]==0)
sprintf(ch2d,"6%-3d",costgold[map[i]]);
else sprintf(ch2d,"%-3d",costgold[map[i]]);
sprintf(s1,"|%2d | %-32.32s |",
i+1,chains[map[i]].description);
strcat(s,s1);
pla(s,&abort);
}
pla("+---+------+---------------------------+---+------+---------------------------+",&abort);
}
nl();
}
Part 6: Save BBSUTL1.C
Part 7: Go to void do_chains
Part 8: Search for "Sorry, no external programs available."
Go down to:
if (mapp==1) {
run_chain(map[0]);
return;
Delete this little block of code.
Part 9: Save BBSUTL1.C again, and compile.
That's it. simple huh? Well just watch your 's in the BBS Name, they dont
count as spaces, so dont line up the |'s or ║'s becuase then you will come up
short when WWIV displays the line. If you have any questions, comments or
problems with this mod, I can be reached at 1@17315 or via the WWIVLink Mod
Discussion sub. Cya.
7Tanis
5The Half-Elven